home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / comm / tcp / AmiSlate1_2.lha / AmiSlate / ExampleRexx / constants.rexx < prev    next >
OS/2 REXX Batch file  |  1995-05-24  |  2KB  |  46 lines
  1. /* Constants for use with AmiSlate's ARexx interface */
  2.  
  3. /* When communicating information about which tool (a.k.a mode) the local
  4.    or remote client is in, AmiSlate makes use of the following constants.
  5.    It is a good idea to copy the following declarations into the beginning
  6.    of your ARexx program in order to later easy refer to different modes. */
  7.  
  8. /* Mode Constants for use with AmiSlate's ARexx interface */
  9. AMode.DOT      =  0 
  10. AMode.PEN      =  1 
  11. AMode.LINE     =  2 
  12. AMode.CIRCLE   =  3 
  13. AMode.SQUARE   =  4 
  14. AMode.POLY     =  5 
  15. AMode.FLOOD    =  6 
  16. AMode.DTEXT    =  7 
  17. AMode.FILLCIRCLE = 13
  18. AMode.FILLSQUARE = 14
  19.  
  20. /* When replying to the WaitEvent function, AmiSlate uses a set of message 
  21.    codes to indicate which type of event occured.  Note that despite the 
  22.    binarily-disjoint nature of the following constants, only one type
  23.    of event currently is replied per WaitEvent call. */
  24.  
  25. /* Message reply codes for use with AmiSlate's ARexx interface */
  26. AMessage.TIMEOUT     = 1    /* No events occurred in specified time period */
  27. AMessage.MESSAGE     = 2    /* Message recieved from remote Amiga */
  28. AMessage.MOUSEDOWN   = 4    /* Left mouse button press in drawing area */
  29. AMessage.MOUSEUP     = 8    /* Left mouse button release in drawing area */
  30. AMessage.RESIZE      = 16    /* Window was resized--time to redraw screen? */ 
  31. AMessage.QUIT        = 32    /* AmiSlate is shutting down */
  32. AMessage.CONNECT     = 64    /* Connection established */
  33. AMessage.DISCONNECT  = 128    /* Connection broken */
  34. AMessage.TOOLSELECT  = 256    /* Tool Selected */
  35. AMessage.COLORSELECT = 512    /* Palette Color selected */
  36. AMessage.KEYPRESS    = 1024    /* Key pressed */
  37.  
  38. /* Furthermore, when MESSAGE events are replied, the following subtypes
  39.    (returned in the code1 result variable) reflect the origin of the
  40.    received method: */
  41.  
  42. AMessageOrg.STRINGUSER      = 1    /* String was sent by remote ARexx script */
  43. AMessageOrg.STRINGEASYREQ   = 2 /* String was sent by remote EasyRequester */
  44. AMessageOrg.STRINGSTRINGREQ = 3 /* String was sent by remote StringRequester */
  45.  
  46.